read_spectrum Function

public function read_spectrum(file_name) result(spectr)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),			value	::	file_name

Return Value type(Spectrum)